home *** CD-ROM | disk | FTP | other *** search

---

/ Developer Source 6 / developer source - volume 6.iso / parad / jun96 / conef104.gif

< prev

next >

Graphics Interchange Format  |  1996-11-19  |  8KB  |  514x406  |  4-bit (5 colors)

Labels: text | screenshot | display | software | number
OCR: NOISY.FSL :: RadioBtn :: pushButton method pushButton (var eventInfo Event) var sndLoop, sndAsync SmallInt endVar sndLoop = SND_LOOP sndAsync = SND_ASYNC if self.value = False then if sndPlaySound ("chimes . way" sndAsync .bitOR (sndLoop) ) = FALSE then message ("ERROR: Problem playing waveform") endIf theText = "Stop Sound" else sndPlaySound ("chimes . wav", SND_ASYNC) theText = "Start Sound" endIf endmethod Edit Line: 1 Col: 1

---